10 NMEMTOP=PEEK(106)-4›20 POKE 106,NMEMTOP›30 GRAPHICS 0›40 CHROM=PEEK(756)*256›50 CHRAM=NMEMTOP*256›55 LIST ›56 POKE 756,NMEMTOP›60 REM COPY ROM CHARACTER SET TO RAM›70 FOR I=0 TO 1023›80 POKE CHRAM+I,PEEK(CHROM+I):NEXT I›90 REM MODIFY CHARACTER SET POINTER›100 POKE 756,NMEMTOP›110 START=NMEMTOP*256+(8*97)›130 FOR I=0 TO 31›140 READ A:POKE START+I,A:NEXT I›150 REM PRINT PUMPKIN ON SCREEN›160 PRINT "ab"›170 PRINT "cd"›200 DATA 0,0,16,60,63,103,66,230›210 DATA 0,0,8,56,252,230,66,103›220 DATA 252,255,245,112,120,63,31,7›230 DATA 63,255,175,14,30,252,248,224›